home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Belgian Amiga Club - ADF Collection
/
BS1 part 34.zip
/
BS1 part 34
/
FredFish PD 314.adf
/
Zc
/
zcsrc.lzh
/
IOLib
/
stdio
/
write.c
< prev
Wrap
C/C++ Source or Header
|
1989-05-29
|
440b
|
26 lines
#include <stdio.h>
#include <fcntl.h>
#include <errno.h>
extern struct _device *_devtab[];
extern long Write(), IoErr();
int write(h, data, len)
int h;
char *data;
unsigned int len;
{
register long rv;
register struct _device *p;
Chk_Abort();
p = &((*_devtab)[h]);
if ( h >= OPEN_MAX || !p->fileHandle )
return (errno = EBADF);
rv = Write(p->fileHandle, data, (unsigned long) len);
if(rv < 0)
errno = IoErr();
return(rv);
}